home *** CD-ROM | disk | FTP | other *** search
- Cookies := TStringList.Create;
- ...
- Cookies.Add('Delphi=Cool');
- Cookies.Add('JBuilder=Wait and see');
- // set cookies which will be sent back only to the current domain and path
- // their expiry date is 7 days from today and will be sent over a non-secure
- // HTTP connection
- Response.SetCookieField(Cookies, '', '', Now + 7, False);
- ...
- Cookies.Free;
-